home *** CD-ROM | disk | FTP | other *** search
/ The Pegasus Disc / The Pegasus Disc 2000.bin / pc / install / ucfscript.scp < prev   
Text File  |  2000-06-16  |  944b  |  48 lines
  1. ;
  2. ; This is a script file that demonstrates how
  3. ; to establish a PPP connection with a host
  4. ; that uses a menu system.
  5. ;
  6. ; A script file must have a 'main' procedure.
  7. ; All script execution starts with this 'main'
  8. ; procedure.
  9. ;
  10.  
  11.  
  12. ; Main entry point to script
  13. ;
  14. proc main
  15.  
  16.  
  17.    ; Wait for the login prompt before entering
  18.    ; the user ID
  19.  
  20.    waitfor "name:"
  21.    transmit $USERID
  22.    transmit "^M"
  23.  
  24.    ; Enter the password
  25.  
  26.    waitfor "word:"
  27.    transmit $PASSWORD
  28.    transmit "^M"
  29.  
  30.    ;
  31.    ; This provider has a menu list like this:
  32.    ;
  33.    ;   1              : Our special GUI
  34.    ;   2              : Establish slip connection
  35.    ;   3              : Establish PPP connection
  36.    ;   4              : Establish shell access
  37.    ;   5              : Download our software
  38.    ;   6              : Exit
  39.    ;
  40.    ;   annex:
  41.    ;
  42.  
  43.    waitfor ">"
  44.  
  45.    transmit "ppp^M"       ; Choose PPP connection
  46.  
  47. endproc
  48.